home *** CD-ROM | disk | FTP | other *** search
/ CinE CD 6 / CinE CD ROM 06.iso / pc / playqt.dir / 00001_Script_1 next >
Text File  |  1996-06-21  |  797b  |  33 lines
  1. global gr1, gr2, gsoundFlag, gduration, fname, gwin, r
  2. global gquicktimetoplay, gscale, gsoundlevel, gmode
  3.  
  4. on startmovie
  5.   
  6.   set the soundlevel = gsoundlevel
  7.   importFileInto cast 8, gquicktimetoplay
  8.   set the name of cast 8 = "qtdummy"
  9.   set the directtostage of cast "qtdummy" = TRUE
  10.   set the crop of cast "qtdummy" = FALSE
  11.   puppetsprite 1, TRUE
  12.   set the rect of sprite 1 = the rect of cast 8 * gscale
  13.   updatestage
  14.   
  15.   set the type of sprite 1 = 16
  16.   
  17.   set gsoundFlag = 1
  18.   set the keydownScript = "keyDown_handler"
  19. end startmovie
  20.  
  21. on idle
  22.   --
  23. end idle
  24.  
  25. on closewindow
  26.   --set the movierate of sprite 1 = 0
  27.   if (gmode = "auto") then
  28.     tell the stage to set the timeoutScript to "to_script2"
  29.   end if
  30.   
  31.   tell the stage to cleanupMIAW
  32. end closewindow
  33.